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1*0 ABSTRACT 



THE IB A IS AN IOMOD THAT EXERCISES THE IBV11-A i NSTRUMENTATION 

BUS INTERFACE (IB BUS) * QM START IT DOES A BRIEF LOGIC TEST* 

ON RESTART AND AFTER ENDPASS £ IT EXERCISES THE IBV11-A BY MAKING 

IT INTERRUPT AND PISS DATA TO ITSELF* 

IT IS RECOMMENDED THAT YOU REMOVE THE IB-BUS CABLE FROM THE 
TBV11 BEFORE YOU RUN THIS MODULE* HOWEVER IF YOU CHOOSE HOT 
TO AND YOU DO GET ERRORS/ THE ERRORS COULD BE CAUSED FROM 
SOME DEVICE ON THE IB-BUS AMD WOT THE IBV11-A* 



2.0 REQUIREMENTS 



HARDWARES ONE IBV11-A. 

STORAGE:: IB A REQUIRES I 

1« DECIMAL WORDS! 417 
2* OCTAL WORDS % 0641 
3* OCTAL BYTES : 1502 



3*0 PASS DEFINITION 



ONE PASS OF THE IB A MODULE CONSISTS OF 17700 (OCTAL) DATA 
TRANSFERS TO AND FROM THE IBV11-A. 



4,0 EXECUTION TIME 



ONE PASS OF THE IBA MODULE RUNNING ALONE TAKES APPROXIMATELY 
ONE MINUTE* 

5*0 CONFIGURATION REQUIREMENTS 

DEFAULT PARAMETERS : 

DEVADR:160150, VECTOR:640, BRIM, DEVCNT:1, SRlsO 

REQUIRED PARAMETERS: 
NONE • 

6*0 DEVICE/OUTPUT SET-UP : 



NONE • 
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SEQ 0003 



7*0 



MODULE OPERATION 



TEST 



1. ^STARfi 



RESTART) 
A. 
B* 
C» 
D. 
E. 



SEQUENCE 

BIT EXERCISE CSR # DATA REGISTER* 
DATA TRANSFERS 

SET INTERRUPT ENABLE AND TCS. 
IBV INTERRUPTS TO "TKRSRV" 
SET "TON" AND "LON", CLEAR TCS 
IBV INTERRUPTS TO "TKRSRV 1 

DATA PATTERN GENERATED AND LOADED INTO IBD 
(DATA REGISTER) 

DATA GETS "GATED" ONTO IB-BUS AND RECEIVED BY IBD 
THUS GATING A "LNR" INTERRUPT, 
"LNR" INTERRUPTS TO "LNRSRV" 

DATA RECEIVED IS COMPARED AGAINST DATA SENT/ IF 
UN EQUAL # AN ERROR IS REPORTED. 

IF ALL DATA TRANSFERS HAVE BEEN MADE/ AN "ENDPASS" 
IS REPORTED/ ELSE PROGRAM CONTROL IS RETURNED TO 
STEP D« 



8.0 



OPERATION OPTIONS 



9*0 



VALID SRI VALUES 



SRI BIT 




EN ABLE/ DISABLE 




NON-STANDARD PRINTOUTS 



FUNCTION 

ENABLE RANDOM PATTERN TRANSFERS 

ENABLE COMPLEMENT PATTERN 
TRANSFERS. PATTERN IN LOCATION 
"PATERN" IS COMPLEMENTED EACH 
TIME IT IS USED. 



ALL PRINTOUTS HAVE THE STANDARD FORMATS DESCRIBED IN THE 
DEC/X11 DOCUMENT. 
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160150 

ooo hi 



...m 

000000 
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.TITLE IB AD DEC/X11 SYSTEM EXERCISEF MODULE 
; DDXCOM VERSION 6 23-MAY-78 

.LIST BIN _ . 

r********************************************* 



SEQ 0001 



• ****** 

begin: 

MODNAM: 
XFLAG: 

ador: 
vector: 
BRl: 
BR2: 
DVIDl: 
sri: 



** ******** 



» ASCII . 

.BYTE OPEN 
160150+0 
640+0 



SR2: 

SR3s 
SR4 : 

******** 

STAT: 
INITS 

spoint: 
PASCNT: 
icomt: 
ICOUHT: 
sofcnt: 
hrdcnt: 
sofpas: 
hrdpas: 
syscnt: 
rannum: 
config: 
resi: 
RES2 : 
SVRO: 
SVR1 : 
SVR2 : 
SVR3 : 
SVR4 S 
SVR5 : 
SVR6 : 

csra: 

SB ADR: 
ACSR: 

wasadr: 
astat: 

ERRTYP: 
ASB: 
AMASS 
RSTRT: 

hdto: 
wdfrs 

IHTRS 
IDNUM: 
HODSP 



.BYTE 
.BYTE 

+1 

OPEN 
OPEN 
OPEN 

OPEN 
**** 

140000 
START 

MODSP 

177000 



PRTY6+0 
PRTY6+0 



************ ******* 







OPEN 
OPEN 
OPEN 
OPEN 
OPEN 
OPEN 
OPEN 
OPEN 

OPEN 

OPEN 

OPEN 

OPEN 

RESTRT 

OPEN 

OPEN 

OPEN 

141 



NAME. 

;USED TO KEEP TRACK OF WBUFF USAGE 
;1ST DEVICE ADUR. 
;1ST DEVICE VECTOR 1 . 
;1ST BR LEVEL. 
;2ND BR LEVEL. 
;DEVICE INDICATOR 1. 
;SHITCH REGISTER 1 
JSWITCH REGISTER 2 
;SWITCH REGISTER 3 
;SWITCH REGISTER 4 
a** a************************ ******** 
JSTATUS WORD. 
;MODULE START A DDR. 
;MQDULE STACK POINTER. 
JPASS COUNTER. „ 
}U OF ITERATIONS PER PASS=1770C0 
;LOC TO COUNT ITERATIONS 
HOC TO SAVE TOTAL SOFT ERRORS 

LOC TO SAVE TOTAL HARD ERRORS 

LOC TO SAVE SOFT ERRORS PER PASS 

LOC TO SAVE HARD ERRORS PER PASS 

$ OF SYS ERRORS ACCUMULATED 

HOLDS RANDOM ft WHEN RAND MACRO IS 

RESERVED FOR MONITOR USE 

RESERVED FOR MONITOR USE 

RESERVED FOR MONITOR USE 

LOC TO SAVE RO. 

LOC TO SAVE Rl. 

LOC TO SAVE R2. 

LOC TO SAVE R3. 

LOC TO SAVE R4. 

LOC TO SAVE R5. 

LOC TO SAVE R6. 

ADDR OF CURRENT CSR. 

ADDR OF GOOD DATA, OR 

CONTENTS OF CSR. 

ADDR OF BAD DATA, OR 

STATUS REG CONTENTS. 

TYPE OF ERROR 

EXPECTED DATA. 

ACTUAL DATA. 

RESTART ADDRESS AFTER END OF PASS 
WORDS TO MEMORY PER ITERATION 
WORDS FROM MEMORY PER ITERATION 
« OF INTERRUPTS PER ITERATION 
MODULE IDENTIFICATION NUMBER=141 



***************** 



******************* 



******** 



************** 
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180 
181 

182 
183 
184 
185 
186 
187 
188 
189 
190 
191 
192 
193 
194 
195 
196 
197 
198 
199 
200 
201 
202 
2 03 
204 
205 
206 
207 
208 
209 
210 
211 
212 
213 
214 
215 
216 
217 
218 
219 
220 
221 
222 
223 
224 
225 
226 
227 
228 
229 
230 
231 

III 

234 

235 



000224* 
000226' 

000230' 
000232 ' 
000234' 

000236' 
000240' 
000242' 

000244* 
000246" 



000250" 
000252° 



000254' 

000256' 



160150 
160152 

000640 
000642 
0Q0644 
000646 
000650 
000652 
000654 
000656 



000000 

000252 



123456 
071234 
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J MODULE REQUIRED REGISTERS - SET UP BY THIS MODULE. 

/CONTROL AND STATUS 
;DATA REGISTER 

;EPPOR INTR. VECTOR 

;SRQ INTR. VECTOR 

;TKR OR CMD INTR. VECTOR 

/ LNR INTR. VECTOR 

CONSTANTS AND STORAGE LOCATIONS 




IBS: 


.WORD 


160150 


IBDS 


.WORD 


160152 


VECTJU 


. WORD 


640 


PRAS 


.WORD 


642 


¥EC?BS 


.WORD 


644 


prb: 


. WORD 


64 6 


VECTC: 


. WORD 


650 


PRC: 


.WORD 


652 


VECTD: 


.WORD 


654 


PRO: 


. WORD 


656 



cnt: 

patern: 



RkUh'. 

ranb: 



. WORD 

.WORD 



123456 
071234 



MOV 
DEC 
MOV 
MOV 
ADD 

MOV 

MOV 
ADD 
MOV 
ADD 
MOV 
ADD 
MOV 
ADD 
MOV 
ADD 
MOV 
ADD 
MOV 
ADD 
MOV 

! 





252 



ICONT,CNT 
CNT 

ADDR, IBS 

IBS.IBD 

#2,IBD 

VECTOR, RO 

R0,VECTA 

#2,R0 

R0,PRA 

#2,R0 

R0,VECTB 

#2,R0 

R0,PRB 

#2,R0 

R0,VECTC 

«2,R0 

R0,PRC 

#2,R0 

RO, VECTD 

#2,R0 

R0,PRD 



JICONT-1 

/CURRENT PATTERN BEING 
TRANSFERRED BETWEEN TKR AND LKP 
;ON I3V11 BUS. 

/RANDOM NUMBERS GENERATED 
/BY RANDOM NUMBER GENERATOR 
;T0 GET "PATERN" IF NOT 
; INH IB ITED BY "SRI" 



;SAVE ITERATION COUNT 

;define next TO LAST ITERATION 

/GET BASE CSR ADDR. 

;NCW FORM DBP ADDR. 

;=CSR+2. 

;N0W LETS FIX VECTOR ADDRESS 

;/SET THIS VECTOR ADDR. 
;/UPDATE ADDR FOR NEXT VECTOR. 
I/SET THIS VECTOR ADDR. 
;/UPDATE ADDR FOR NEXT VECTOR. 

} /SET THIS VECTOR ADDR. 
;/UPDATE ADDR FOR NEXT VECTOR. 
;/SET THIS VECTOR ADDR. 
//UPDATE ADDR FOR NEXT VECTOR. 

;/SET THIS VECTOR ADDR. 
J/UPDATE ADDR FOR NEXT VECTOR. 
;/SET THIS VECTOR ADDR. 
; /UPDATE ADDR FOR NEXT VFCTOR. 

;/SET THIS VECTOR ADDR. 
;/UPDATE ADDR FOR NEXT VECTOR. 
;SET THIS VECTOR ADDR. 



IBV11-A CONTROL & STATUS REGISTER 
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INSTRUMENT BUS CONTROL & STATUS REGISTER 



15 14 13 12 

SRQ ER2 ER1 EPO 
R R R R 



10 9 8 
CMO TKR LNR 

R R R 



7 
ACC 



6 5 4 3 2 1 

IE TON LON IBC REM EOF TCS 



R MEANS THIS BIT MAY ONLY BE READ BY THE LSI-ll. 

W MEANS THIS BIT MAY BE BOTH READ AND WRITTEN BY THE LSI 



IBV11-A DATA REGISTER 



THE HIGH BYTE MONITORS THE 
DATA HANDSHAKE LINES. ~' " ~ 



_ 5 IB CONTROL LINES AND THE 3 IB 

_ __ THE DATA ON THESE LINES IS LATCHED TO 

REMAIN STABLE WHILE BEING READ. THE LOW BYTE MONITORS THE IB 
DIO LINES DIRECTLY WHEN READ. DATA WRITTEN INTO THE LOW BYTE IS 
LATCHED INTO A BUFFER AND SENT OUT ON THE IE DIO LINES IF TON 
OR TCS AND ATN ARE SET. THE BUFFER IS ALWAYS CLEARED BY DAC. 



IBD 



INSTRUMENT BUS DATA REGISTER 



16X152 



15 14 13 12 11 10 9 8 

EOI ATN IFC REN SRQ RFD DAV DAC 
RRRRRRRR 



5 4 3 2 1 
106 105 104 103 102 101 

w a h u w u 



R MEANS THIS BIT MAY ONLY BE READ BY THE LSI-ll. 

W MEANS THIS BIT MAY BE BOTH READ AND WRITTEN BY THE LSI-ll. 



;*LOGIC TEST #1 BE SURE AN IBV11-A EXISTS AT THE 
5*SPECIFIED ADDR. IF NO IBV11-A, THEN A DEC/X11 
;*SYS ERROR WILL OCCUR. 



000414' 005777 177604 



J ADDRESS THE IBV. IF SYS ERROR 
;OCCURS, THEN IBV DID NOT RESPOND 
; WHEN ADDRESSED. 
;MAKE SURE THAT THE ADDRESS 
/FORMED BY THE SWITCH PACK ON THE 
;OPTION AGREE WITH THE ADDRESS 
;THIS SOFTWARE HAS IN "ADDR". 



;*LOGIC TEST #2 



IN THIS TEST WE ARE GOING TO SET 

TCS (CSR BITO), EOP (CSR BIT01), 

REM (BIT02), LON (CSR BIT04) 

TON (BIT05), AND ACC (CSR BIT07) 

NOW, TCS SHOULD CAUSE CMD (CSR BIT10) 

AND DAC (IBD BIT8) TO SET. EOP 

SHOULD CAUSE EOI (IBD BIT15) TC SET. 

REM SHOULD CAUSE REN (IBD BIT12) TO SET. 



332 
333 
334 
335 
336 
337 
338 
339 
340 
341 
342 
3 43 
344 
345 
3 46 
3 47 



000420' 012777 000267 177576 L0G2: 

000426' 017767 177572 
000434' 012767 002267 



177446 
177442 



000450' 001411 
000452' 016767 
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292 
293 
294 
295 
296 
297 
298 
299 
300 
301 
302 
303 
304 
305 
306 
307 
308 
309 
310 
311 

m 

Hi 

316 
317 
318 
319 
320 
321 
322 
323 
324 
325 
326 
327 
328 
329 
330 
331 
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0004422 026767 177434 177434 

177546 177420 

000460' 012767 000025 177420 

000466' 104405 000000' 000000 



000474' 017767 

000502' 012767 

000510' 026767 

000516' 001411 

000520' 016767 

000526' 012767 

000534' 104405 



177526 177400 

152000 177374 

177366 177366 

177502 177352 

000025 177352 

000000' 000000 



000542' 005077 177456 



IS: 



2$: 



000546' 

000546' 104407 
000552' 104407 



000556' 012777 

000564' 032777 

000572' 001017 

000574' 017767 



000000' 

000000' 



000100 177440 
000100 177432 



177424 177300 

"~~74 

62 

000616' 012767 000027 177262 



00574' 017767 177424 1773 

mn-nm mm \va 



}* 

M0¥ 

MOV 

MOV 



CMP 
BEG 
MOV 



#267,§IBS 

PIBSfACSR 
#002267, ASTAT 



ACSR, ASTAT 

lls,CSRA 



LON SHOULD CAUSE LNR (CSP BITS) TO SET. 
TON SHOULD CAUSE TKR (CSR 0IT9) TO SET. 
TCS SHOULD ALSO CAUSE ATN (IBD BIT14) TO SET. 

WE ARE GOING TO CHECK THAT ALL THESE BITS SET. 

IF YOU GET ANYTHING LIKE AN ERROR1, OR ERROR2 OR SRQ 

SET - READ DESCRIPTION PRFCFEDING "ERRSRV". 

/LOAD IBS WITH ACC, TON, LOR, EOP 
; A ND TCS. 
/READ BACK IBS 

;EXPECT ACC, TON, LON, EOP , TCS, REM 
; AND CMD TO 

;DID THEY ALL SET? 
;YES - THEN NEXT CHECK. 
;NO - RECORD CSR'S ADD RS 



MOV #25,ERRTYP 

************** ************************ ******************** 

HRDERS,. BEGIN* NULL ;;CSR PROBLEM WITH CSR BITS AST AT=GOOD, AC SR = B AD 



MOV 
MOV 

CMP 
BEQ 

MOV 



@IBD,ACSR 
#152000, ASTAT 

acsr, ast at 
iEd,csra 



;NOW READ DATA REGISTER 

JEXPECT EOI, ATN, REN AND 

;RFD TO BE SET. 

;DID THEY ALL SET? 

;YFS - NEXT TEST. 

;NO - RECORD DBR'S ADDR. 



MOV 

• ****** 
HRDERS #B 



Ml 



************************ 

EGIN, NULL ;;DBR PROBLEM WITH D BR 

/CLEAR THE CSR. 



**************** 
BITS ASTAT=GQOD, 



*LOGIC TEST #3 



BREAKS, BEGIN 

BREAKS, BEGIN 



MOV 

BIT 
BfJE 
MOV 
MOV 

MOV 

MOV 



#BIT6,gIBS 
|BIT6,@IBS 

gf BS,ACSR 
|BIT6, ASTAT 
IBS,CSRA 

#27,ERRTYP 



IN THIS TEST WE'LL WAKE 

SURE THE INTERRUPT ENABLE (BITfr) 

WILL SET AND CLEAR. 



; T EMPOR ARY RETURN TO MONITOR.... 
/THEN CONTINUE AT NEXT INSTRUCTION. 



;SET INTERRUPT ENABLE. 
;DID IT SET? 

JYES - LETS TRY CLEARING IT. 
J RECORD CSR FOR ERROR TYPEOUT. 
; RECORD SHOULD BE. 
/RECORD IBV ADDR. 



?IE FAILED TO CLEAR 
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348 
349 
350 
351 
352 
353 

IU 

356 
357 
358 
359 
360 
361 
363 
363 
3 64 
365 
366 
367 
368 
369 
370 
371 
372 
373 
374 
375 
376 
377 
378 
379 

m 
181 

384 
385 
386 
387 
388 
389 
390 
391 
392 
393 
394 
3 95 
396 
397 
398 
3 99 
400 
401 
402 
403 



000624 s 104405 000000 s 000000 



000632 ' 
000636' 
000644' 
000646' 
000652' 

000660' 

000666' 



005077 

Mill 

016767 



81 o8o^?0' I844O? 



000720* 
000724' 

mm- 

000740' 
000744' 
000746' 

000750' 
000756' 
000764' 



052777 
91270/ 



177366 

177362 



177232 
177346 



012767 000027 
104405 000000- 



000704' 012777 000266 



000010 
000062 
000010 

000000- 

000000' 



177250 
002001 

177234 



177236 

177220 
177220 
000000 



.*****ft**ft***&a#A*^*«**A**a*ftft****ft*^**ft********«iftA**&** ******** 

HRDERS/BEGIN,NULL } 5 INTERRUPT ENABLE FAILED TO CLEAR 

• ****$&***«*&***«* *«*ftft*&&4*'*ftft ***************************** Aft** 

CLR 
MOV 
3EQ 
CLR 
MOV 



; clear interrupt enable, 
/read csr - all should be clear . 
5if clear - next test. 
;expect clear csr. 
; r ecord ibv addr . 



MOV 

HRDERS/ BEG IN/NULL 

«#&*******■* &** ********** * 



******** 
**** ** * * 



;*LOGIC TEST 



177312 
177304 
177272 



177124 
177120 
177106 



BREAKS/BEGIN 
BREAK$/BEGIN 



MOV 



BIS 

MOV 
BIT 
BEQ 

BREAKS/BEGIN 

BREAKS/BEGIN 
DEC Rl 
BNE 1$ 



MOV 
MOV 
MOV 



BIT3^|IBS 



50.,ki 

BIT3,@IBS 



@IBS f ACSR 
§2 00 1/ ASTAT 
IBS/CSRA 



000772' 012767 000025 177106 
001000' 104405 000000' 000000 



001006' 017767 177212 177066 2$: 



MOV #25,ERRT¥P 

• a* *fe ****** 

HRDERS, BEGIN, NULL 

MOV §IBS/ACSR 



IN THIS TEST WE'LL CHECK IBC. 
FIRST WE'LL LOAD THE CSR 

-— AND ACC. 



CLEAR 

THEN SET 



THE ONLY TRICKY THING HERE IS 
WATCHING THAT IBC TIMES OUT 
IN APPROXIMATELY 125 US. 



/TEMPORARY RETURN TO MONITOR.. .. 
JTHEN CONTINUE AT NEXT INSTRUCTION. 

/LOAD IBS WITH ACC/TON/LON 

/AND TCS 

;NOW DO AN IBC. 

;SET TO TIME OUT IF IBC DOESN'T 
;IBC TIMEOUT YET? 
;YES - CONTINUE. 

TEMPORARY RETURN TO MONITOR.... 
;then continue at NEXT INSTRUCTION. 
;0UR LITTLE COUNTER TIME OUT YET? 
;NC - CONTINUE. 

/TIME LOOP EXCEED 125 US - IBC SHOULD HAVE CLEARED. 
; RECORD CONTENTS OF CSR. 
JSHOULD READ. 
;RECORD ADDR. OF IBV. 



************************* 

//IBC (3 IT 3) FAILED TO TIME OUT 

ft******************************* 

; IBC TIMED-OUT - NOW READ CSR. 



********* 
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404 

405 
406 
407 

408 

409 
410 



442 
443 
444 
445 
446 
447 
448 
449 
450 
451 
452 
453 
454 
455 
456 
457 
458 
459 



001014' 012767 



001022' 
001030' 



026767 

001411 



001032' 016767 
001040' 012767 
001046' 104405 



002001 

177054 

177166 
000025 
000000' 



177062 

177054 

177040 
177040 
000000 



CMP 
BEQ 



MO? 
MOV 



#2001, ASTAT 



AC SR, AST AT 
3$ 

IBS/CSRA 




/NULL 

»****■ 



CLR @IBS 
; ENTER HERE ON RESTART 



;THE ONLY BITS THAT SHOULD BE 

;SET IN THE CSR ARE CMD (BIT10) 

; AND TCS (BITO). 

JDID IT WORK OUT OK? 

JYES - NEXT TEST. 

/RECORD IBV ADDR. 



***************************** 



; ;CSR WRONG AFTER ON IBC/ 



UBS 

TKRSRV/gVECTC 
200/gPRC 
LNR5RV, BVECTD 
200/gPRD 
ERRSRV/ PVECT A 
200/gPRA 
!ERRSR¥,@VECfB 
200/gPRB 



; CLE AR THE CSR. 



/BEFORE DECLARING ENDPASS. 

;CLEAR THE CSR. 

;SET UP TKR + CMD INTR. 

/PRIORITY ON INTERRUPT. 

;SETUP LNR INTR. 

^PRIORITY ON INTERRUPT 

;PCINT TC ERROR SERVICE ROUTINE 

^PRIORITY ON INTERRUPT. 

;PCINT TO ERROR ROUTINE ON SRQ 

^PRIORITY ON INTERRUPT 



EXIT$/BEGIN 



#BIT6f BIT0/@IBS ;SET INTERRUPT ENABLE AND TCS - 

/THIS WILL CAUSE IBV TO INTERRUPT 
; AFTER TT HAS CONTROL OF THE IB-BUS. 

/EXIT TO MONITOR. MODULE WAIT FOR INTERRUPT. 



001156' 032777 002000 
001164' 001404 
001166' 012777 



001174' 000002 



177040 
000360 177030 



THIS INTERRUPT SERVICE ROUTINE W ILL TAKE 

CARE OF "CMD" AND "TKR" INTERRUPTS FROM THE 

IBV11. WHEN TEST IS STARTED, WE ISSUED A 

"TCS" SO THE FIRST THING THAT SHOULD HAPPEN IS A 

"CMD" INTR. WHEN WE GET THAT/ WE'LL SET "TON" 

AND "LON" TO TRANSFER DATA. 

WHEN TON GETS SET WE'LL GET INTERRUPTED 

RIGHT BACK HERE WHERE WE'LL XM ITT DATA. WHEN 

DATA IS XMITTED, WE'LL GET A LNR INTERRUPT TO 

"LNRSRV" WHERE WE'LL DELAY READING DATA. "ACC" 

IN THE IBS PREVENTS US FROM BEING FLOODED WITH " 

INTR. - THAT IS WE MUST ACTUALLY READ THF DATA F 

THE IBD BEFORE A "TKR" INTR. HITS US AGAIN. 

*BIT10/(aiBS ;IS THIS A "CMD" INTERRUPT? 

1$ JNC - "TKR" SERVICE. 

#BIT71BIT6SB£T5!BIT4/BIBS ;YES - CLEAR TCS (CLEARS ATM) SET FOR 
/TKR AND LNR (WITH ACC) INTERRUPTS. 
;THIS INTERRUPT DID NEED IMMEDIATE 
; ATTENTION* ALL OTHERS CAN BE DELAYED. 
;EXIT - TKR INTERRUPT NEXT. 
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460 
461 
462 
463 
464 
465 
466 
467 
468 

3*? 

471 
472 
473 
474 
475 
476 
477 
478 
479 
480 

483* 
484 
485 
486 
487 
488 
489 
490 
491 
492 
493 
494 
495 
496 
497 
498 
499 
500 
501 

m 

504 
505 
506 
507 
508 
509 
510 
511 
512 
513 
514 
515 



001176' 

001176* 000004 000000* 001204' 

001204' 004767 000212 

001210" 016777 177036 177010 

001216* 104400 000000* 
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042777 
000004 



000100 176774 
000000" 001236" 



mm- 

001244* 
001252* 
001260* 
001266* 
001270* 

001276* 



16767 177010 176640 

\M mm mm 



67 

Hlttl 

012767 
104405 



176620 176614 

176732 176602 

000001 176602 

000000* 000000 



001334* 104400 000000* 

mm- mm im oo- 



SfQ 0010 



0IRQ$,BEGIN,2$ 



2$: 



1$5 



001312' 026767 176732 176520 2$: 

001320' 001407 

001322* 104413 000000* 

001326' 052777 000100 176670 



3$: 



QUEUE UP TO CONTINUE AT 2$ AND RTI 



JSR PC/PATGEN 
MOV PATERN,faiBD 
EXITS/BEGIN 



JGO GET A PATTERN TO SEND 
;LCAD PATTERN. 

;EXIT TO MONITOR. MODULE WAIT FOR 



INTERRUPT. 



/lnrsrv this routine receives "lnr" interrupts from the ibv11 

; it mill delay/ compare data xmitted to data received, 

; if bad* he'll report an error/ if good 

; it allows the next "tkr" interrupt. 

; we'll also check for "end pass". 

;tnp clear of interrupt enable. 

} queue"up"to~continue~at"I$ and'rti 



llC #100/$IBS 



MOV 
MOV 
BIC 
CMP 
BEQ 
MOV 



PATERN/ASTAT 

ftlBD/ACSR 
#177400, ACSR 
ASTAT/ACSR 

ilo/CSRA 



;record current pattern, 
/read data from dbr. 
;strip unused data bits 
;data sent = data received? 
;yes - continue 
;record addr. of data peg. 



MOV #1,ERRTYP 

************************************************** 

hrder$/Begih,null ;;bad data transfer-astat=data sent ;acsr=data received 

• ****** ********** a*a*a*«#**Aft*a ************** 



CMP CNT/ICOUNT 
BEQ 3$ 
ENDIT$/BEGIN 

BIS #BIT6,@IBS 

EXITS/BEGIN 

CLR gIBS 
ENDIT$, BEGIN 



JDONE ENOUGH XFERS? 
;YES - REPORT END PASS 
/SIGNAL END OF ITERATION. 

;mcnitor shall test END of PASS 

;N0 - RESET INTERRUPT ENABLE - THIS 
/WILL CAUSE A "TKR" INTERRUPT 
;F0R H EXT DATA. 

;exit to monitor. MODULE wait FOR 

/CLEAR THE CSR. 

;S IGNAL END OF ITERATION. 

/MONITOR SHALL TEST END OF PASS 



; ERRSRV 



THIS ROUTINE TAKES CARE OF ERROR INTERRUPTS 

AS WELL AS INTERRUPTS THAT ARE FATAL 

TO THIS PIECE OF SOFTWARE. IT WILL 

RECORD THE CSR, CLEAR THE CSR - DELAY (VIA 

A PIRQ) THEN REPORT THE ERROR. 

SINCE THIS TYPE OF ERROR SHOULD NEVER 
OCCUR; JUST IN CASE YOU GET ONE, WE 

WON'T DROP THE MODULE. IN THIS WAY, YOU 



IB AD DEC/X11 SYSTEM EXERCISER MODULE 
XIBAD0.P11 12-OCT-78 12:00 

516 
517 
518 
519 
520 
521 

ffi 

524 
525 
526 
527 
528 
529 
530 
531 
532 
533 
534 
535 
536 
537 
538 
539 
540 
541 
542 
543 
544 
545 
546 
547 
548 
549 
550 
551 
552 
553 
554 
555 
556 
557 
558 
559 
560 
561 
562 
563 
564 
565 
566 
567 
568 
569 
570 
571 
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CAN ACCUMULATE DATA ON THE PROBLEM. 
WE WILL, HOWEVER; RESTART THE TRANSFER 
SEQUENCE FROM THE POINT OF SETTING "TCS" 
TO GET A "CMD" INTERRUPT . 

TYPES OF ERRORS THAT GOT US HERE AND THEIR 
CAUSES % 

1. SRQ INTERRUPT (BIT15 SET IN IBS) 

THIS POINTS TO SOME DEVICE STILL CONNECTED 
TO THE IB BUS. DISCONNECT THE CABLE FROM 
THE IBV11. IF YOU STILL GET A SRQ INTEFRUPf , 
YOU'VE GOT A PROBLEM. 

2. ER1 INTERRUPT (9IT13 SET IN IBS) 
THIS BIT IS FATAL TO THE IPVU WHEN SET. 
THE IB BUS IS SCREWED-UP. 

THERE ARE TWO CAUSES FOR IT: 

A. ATN, IFC, OR REN ARE ASSERTED ON THE IB BUS 
BY SOMEONE OTHER THAN THIS IBV11. TRY 
DISCONNECTING THE IB BUS CABLE FROM THE 

IBV11 (THE CUSTOMER MAY HAVE SOME WEIRD 
OPTION ON THE IB BUS THAT IS IN DIRECT 
CONFLICT WITH THE IBVU SPEC). IF THIS 
DOESN'T HELP, START LOOKING FOR A PROBLEM 
IN THE GATES THAT GENERATE AN ER1. 

B. ATN, IFC, OR REN ARt ASSERTED ON THE IB BUS 
BY THE IBV11, BUT ARE NOT RECEIVED BACK 

BY IT. I'VE ALREADY CHECKED THIS CONDITION 
ONCE IN THE LOGIC TESTS - PUT IT WAS A 
ONE TIME CHECK AND MAYBE EXERCISING THIS 
BABY A LOT CAUSED A PROBLEM IN THAT CIRCUITRY. 

NOW TO TRY AND TELL THE DIFFERENCE 
BETWEEN A AND B: 

IF TCS IS SET IN THE CSR AND ATN IS NOT 
SET -BIS THE PROBLEM. 

IF TCS IS CLEAR BUT ATN IS SET STEP A IS 
THE PROBLEM. 

NOW I DON'T USE REN OR IBC IN THE DATA 
TRANSFERS SO STEP A IS MOST LIKELY TO 
BE THE PROBLEM - EXAMINE THE CSR TO SEE IF 
EITHER OR BOTH ARE SET. 

3. ER2 INTERRUPT (BIT14 SET) 

ERROR 2"S ARE CAUSED BY A TALKER ON 
THE BUS AND NO LISTENERS. 

I DON'T LET THAT HAPPEN AS I MAKE THE 
IBVU A LISTENER AS WELL AS A TALKER. 
YOU BETTER LOOK BACK AT THE CIRCUITRY THAT 
GENERATES AN ERROR 2 - ITS PAD ! 



I BAD DEC/X11 SYSTEM EXERCISER MODULE 
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S72 
573 
574 
575 
576 
577 
578 
579 
580 
581 
582 
583 
584 
585 
586 
587 

III 

590 
591 
592 
593 
594 
595 



598 
599 
600 

601 
602 
603 
604 
605 
606 

m 

609 
610 

611 



001350' 

001356' 
001364" 



01776 



176650 176524 

win 176530 

001370- 000004 000000" 001376" 



001376' 016767 
001404' 005067 
001410' 104405 



88111°' 

001436' 

001440' 
001446' 
001452' 
001460' 
001464' 

001472' 
001500' 



032767 
001403 

mm 

066767 

005567 
016767 

042767 
000207 



176622 176474 
176476 

000000' 000000 



001416' 000167 177522 



000001 176366 

176614 



MOV 
MOV 
CLR 



1$: 



176610 176610 1$: 

!?6l8o 176574 
176572 

176564 176560 

177400 176552 2$: 



aiBS,ACSR 
PIBD/ASTAT 

|IBS 



;record contents of csr. 
; record contents of dbr. 
>st0p the ibv by clearing csr. 



£lRQ$,BEGIN,l$ 



QUEUE UP TO CONTINUE AT 1$ AND HTI 



MOV IBS,CSRA ; RECORD ADDR OF CSR. 

CLR ERRTYP 

• ***** ****** *********** ft 

HRDERS #BEGIN, NULL ; ; FATAL ERROR WITHIN IBVll SYSTEM-READ DESCRIPTION OF TH 

**************************************************************** 

JMP ERRLP ; RETRY - DATA XFER LOOP. 

;P ATGEN THIS ROUTINE GENERATES A NEW PATTERN TO BE XFERED 
J BETWEEN TALKER AND LISTENER. 

IT LOOKS A "SRI" TO SEE IF IT SHOULD USE A COMPLIMENTING 
PATTERN OR A RANDOM PATTERN 
CALL=JSR PC, PATGEN 

RETURNS WITH PATTERN IN BITS <0:7> OF "PATERN" 
AS DATA XFERS ARE ONLY 8 BITS WIDE. 



PATGEN : BIT 



COM 
BR 

ADD 

ADC 
ADD 
ADC 
MOV 



B I TO , SRI 

It 

s 



pTERN 



RANA,RANB 

RAN A 

RANB/RAN A 
RANB 

RANA/PATERN 
£177400, PATERN 



/COMPLIMENTING PATTERN? 
;NG - GET A RANDOM NUMBER. 
;COMPLIMENT PATTERN. 
;GO AHEAD. 

;THIS LITTLE SEQUENCE 

;WILL GENERATE 

;A RANDOM NUMBER 

;for US TO USE. 

; record random pattern. 

;strip unwanted bits 
;extt. 



ib&d dec 

XIBADO.P 



mi SYSTEM EXERCISER MODULE 
11 12-OCT-78 12:00 
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ICONT 

I COUNT 

fDNUM 

INIT 

intr 



000036R 
000040R 
000122R 
000030R 
000120R 



385 
455 
455 
340 
455 



495 

586 

429 
310* 

435 



312 

212* 

211* 

356 

476* 

209 

493 



306 


315* 


318 


343* 


353* 


394* 


403* 


407 


482* 


483* 


484 


306 


316* 


318 


344* 


355* 


395* 


404* 


407 


481* 


484 


573* 


m 

597 


336 
478 


ffl 


349 
495 


360 
500 


380 
503 


m 


389 
583 


39 


400 


414 


387 






















341 


344 


432 


455 


497 














337 


380 


381 


389 


390 














210* 


493 




















320* 


345* 


356* 


396* 


410* 


486* 


579* 










503 






















ffl 


347* 
500 


358* 


398* 


412* 


488* 


581* 










324 


349 


360 


400 


414 


490 


583 










213* 

212 

383* 

497* 


315 

275 

385* 

502* 


320 
300* 
387 
572 


466* 
302 
394 
574* 


482 
308 
396 
579 


486 

327* 

403 


573 
340* 

410 


341 

417* 


343 
422* 


345 
432* 


352* 
453 



IB AD DEC/X11 
XIBAD0.P11 



IYSTEM EXERCISER MODULE 
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NULL 
OPEN 



PoPSP2 



RES2 
RSTRT 



mm 



104420 
OQ0034R 



000232R 
0Q0236R 



242R 
246R 



— VUv jtu 

- 005746 



000000 
000000 

000040 
000100 
000140 
000200 
000240 
000300 
000340 

. - 146 
024646 
000254R 
000256R 
104417 
0Q0054R 
001060R 
000056R 
000060R 
000112R 
00Q102R 
G00042R 
104406 
000046R 
00Q032R 
000040 
000016R 
000020R 



Hit 
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476# 



178# 



602 
602 



420# 



178 
597 



in 



400 

ill 



414 490 
159 160 

176 180# 



SIS 



603* 
604 



604* 
605* 



1 



IB AD DEC/X11 SYSTEM EXERCISER MODULE 
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START 

STAT 
SVRO 
SVR1 
SVR2 
SVR3 
SVR4 
SVR5 
SVR6 
SYSCNT 
TKRSRV 



000260R 
000026R 
000062R 
000064R 
000066R 
000070R 
000072R 
000074R 
000076R 
000052R 
001156R 



TRPDFD= 000022 
VECTA 000230R 



VECTB 
VECTC 
VECTD 
VECTOR 
WASADR 
WDFR 
WDTO 
XFLAG 



000234R 
000240R 
000244R 
000010R 
000104R 
000116R 
000114R 
000005R 
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208# 



216* 
220* 
224* 
228* 
215 



000000 
001502 



000 
001 



ERRORS DETECTED: 

DEFAULT GLOBALS GENERATED: 

RUN-TIME RATIO: 15/4=3.7 
CORE USED: 7K (13 PAGES) 




